



-- add,sub :: Int->Int->Int
-- add a b = a + b
-- sub a b = a - b

-- -- add 1,2 


-- hello = "hello world"


-- main::IO()
-- main = putStrLn hello

f a b = sqrt(a ^ 2 + b ^ 2)

g a = if a == 1
  then "a is one"
  else "a is not one"
